Filename: /text/sbasic/shared/03010301.xhp

Blue Function [Runtime]
Blue 関数 [実行時](hd_id3149180.1)

Returns the blue component of the specified color code.
与えられたカラーコードの青色 (Blue) のコンポーネントを返します。(par_id3156343.2)

Syntax:
構文:(hd_id3149670.3)

Blue (Color As Long)
Blue (Color As Long)(par_id3149457.4)

Return value:
戻り値:(hd_id3149656.5)

Integer
整数(par_id3154365.6)

Parameter:
パラメータ:(hd_id3156423.7)

Color value: Long integer expression that specifies any color code for which to return the blue component.
カラー値:任意のカラーコードを指定するロング整数の表式で、該当する色の青色 (Blue) のコンポーネントが返されます。(par_id3150448.8)

Example:
例:(hd_id3153091.9)

Sub ExampleColor
Sub ExampleColor(par_id3153143.10)

Dim lVar As Long
Dim lVar As Long(par_id3149664.11)

lVar = rgb(128,0,200)
lVar = rgb(128,0,200)(par_id3148576.12)

MsgBox "The color " & lVar & " consists of:" & Chr(13) &_
MsgBox "The color " & lVar & " consists of:" & Chr(13) &_(par_id3154012.13)

"red= " & Red(lVar) & Chr(13)&_
"red= " & Red(lVar) & Chr(13)&_(par_id3148645.14)

"green= " & Green(lVar) & Chr(13)&_
"green= " & Green(lVar) & Chr(13)&_(par_id3159155.15)

"blue= " & Blue(lVar) & Chr(13) , 64,"colors"
"blue= " & Blue(lVar) & Chr(13) , 64,"colors"(par_id3147319.16)

End Sub
End Sub(par_id3147434.17)